home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / PadHop.dxr / the graffic_11_level 3 set.ls < prev    next >
Encoding:
Text File  |  2002-01-31  |  2.9 KB  |  106 lines
  1. property pSprite, spriteNum, pGo
  2. global gFloats, gFrog, gCurrentFloat, gInMotion
  3.  
  4. on beginSprite me
  5.   pGo = 0
  6.   pSprite = sprite(spriteNum)
  7.   gFloats.add(pSprite)
  8.   if gFloats.count = 19 then
  9.     gFloats[1].loc = point(450, 400)
  10.     gFloats[2].loc = point(280, 250)
  11.     gFloats[2].rolla = 1
  12.     gFloats[2].freak = 150
  13.     gFloats[2].flipH = 1
  14.     gFloats[2].pSpeed = 5
  15.     gFloats[3].loc = point(340, 100)
  16.     gFloats[3].rolla = 1
  17.     gFloats[3].freak = 200
  18.     gFloats[3].flipH = 0
  19.     gFloats[3].pSpeed = -5
  20.     gFloats[4].loc = point(350, -50)
  21.     gFloats[4].pFla = 1
  22.     gFloats[4].pLoc = gFloats[4].locH
  23.     gFloats[4].pdir = -3
  24.     gFloats[5].loc = point(310, -200)
  25.     gFloats[5].pFla = 1
  26.     gFloats[5].pLoc = gFloats[5].locH
  27.     gFloats[5].pdir = 2
  28.     gFloats[6].loc = point(280, -350)
  29.     gFloats[6].pFla = 1
  30.     gFloats[6].pLoc = gFloats[6].locH
  31.     gFloats[6].pdir = -4
  32.     gFloats[7].loc = point(250, -500)
  33.     gFloats[7].rolla = 1
  34.     gFloats[7].freak = 50
  35.     gFloats[7].flipH = 0
  36.     gFloats[7].pSpeed = -5
  37.     gFloats[8].loc = point(400, -650)
  38.     gFloats[8].rolla = 1
  39.     gFloats[8].freak = 125
  40.     gFloats[8].flipH = 0
  41.     gFloats[8].pSpeed = -6
  42.     gFloats[9].loc = point(215, -800)
  43.     gFloats[9].flipH = 1
  44.     gFloats[9].pSpeed = 6
  45.     gFloats[10].loc = point(380, -950)
  46.     gFloats[10].rolla = 1
  47.     gFloats[10].freak = 75
  48.     gFloats[10].flipH = 1
  49.     gFloats[10].pSpeed = 4
  50.     gFloats[11].loc = point(167, -1100)
  51.     gFloats[11].pFla = 1
  52.     gFloats[11].pLoc = gFloats[11].locH
  53.     gFloats[11].pdir = -6
  54.     gFloats[12].loc = point(187, -1250)
  55.     gFloats[12].pFla = 1
  56.     gFloats[12].pLoc = gFloats[12].locH
  57.     gFloats[12].pdir = 4
  58.     gFloats[13].loc = point(150, -1400)
  59.     gFloats[13].rolla = 1
  60.     gFloats[13].freak = 50
  61.     gFloats[13].flipH = 0
  62.     gFloats[13].pSpeed = -6
  63.     gFloats[14].loc = point(200, -1550)
  64.     gFloats[14].rolla = 1
  65.     gFloats[14].freak = 120
  66.     gFloats[14].flipH = 1
  67.     gFloats[14].pSpeed = 6
  68.     gFloats[15].loc = point(290, -1700)
  69.     gFloats[15].pFla = 1
  70.     gFloats[15].pLoc = gFloats[15].locH
  71.     gFloats[15].pdir = 5
  72.     gFloats[16].loc = point(320, -1850)
  73.     gFloats[16].pFla = 1
  74.     gFloats[16].pLoc = gFloats[16].locH
  75.     gFloats[16].pdir = -6
  76.     gFloats[17].loc = point(166, -2000)
  77.     gFloats[17].rolla = 1
  78.     gFloats[17].freak = 80
  79.     gFloats[17].flipH = 1
  80.     gFloats[17].pSpeed = 6
  81.     gFloats[18].loc = point(399, -2150)
  82.     gFloats[18].rolla = 1
  83.     gFloats[18].freak = 60
  84.     gFloats[18].flipH = 0
  85.     gFloats[18].pSpeed = -6
  86.     gFloats[19].loc = point(80, -2300)
  87.     gCurrentFloat = gFloats[1]
  88.   end if
  89. end
  90.  
  91. on enterFrame me
  92.   if pGo then
  93.     if pSprite = gCurrentFloat then
  94.       if pSprite.locV >= 400 then
  95.         repeat with i in gFloats
  96.           i.pGo = 0
  97.         end repeat
  98.         gInMotion = 0
  99.       end if
  100.     end if
  101.     gFrog.locV = gCurrentFloat.locV
  102.     gFrog.pLocV = gFrog.locV
  103.     pSprite.locV = pSprite.locV + 5
  104.   end if
  105. end
  106.